home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / s85xx / s8502b.d64 / listing 18 (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  252b  |  9 lines
  1. 1200 REM
  2. 2000 REM REAKTION AUF BEFEHLE (ALLGEMEINE ACTION)
  3. 2100 REM NIMM ROUTINE
  4. 2110 IFVE<>15THEN2200
  5. 2120 IFGE(G1)<>ZNTHENPRINT"ICH SEHE DIESEN GEGENSTAND HIER NICHT !"
  6. 2125 IFGE(G1)=-1THENPRINT"SIE HABEN DIESEN GEGENSTAND BEREITS !"
  7. 2130 IFGE(G1)=ZNTHENGE(G1)=-1:PRINT"OK."
  8. 2200 GOTO1000
  9.